home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Tool Chest / !Interfaces / Universal Interfaces 2.0a1 / PInterfaces / Start.p < prev    next >
Encoding:
Text File  |  1994-07-21  |  2.1 KB  |  111 lines  |  [TEXT/MPS ]

  1. {
  2.      File:        Start.p
  3.  
  4.      Copyright:    © 1984-1994 by Apple Computer, Inc.
  5.                  All rights reserved.
  6.  
  7.      Version:    Universal Interfaces 2.0a1.1  ETO #15, MPW prerelease.  Sunday, July 17, 1994. 
  8.  
  9.      Bugs?:        If you find a problem with this file, send the file and version
  10.                  information (from above) and the problem description to:
  11.  
  12.                      Internet:    apple.bugs@applelink.apple.com
  13.                      AppleLink:    APPLE.BUGS
  14.  
  15. }
  16.  
  17. {$IFC UNDEFINED UsingIncludes}
  18. {$SETC UsingIncludes := 0}
  19. {$ENDC}
  20.  
  21. {$IFC NOT UsingIncludes}
  22.  UNIT Start;
  23.  INTERFACE
  24. {$ENDC}
  25.  
  26. {$IFC UNDEFINED __START__}
  27. {$SETC __START__ := 1}
  28.  
  29. {$I+}
  30. {$SETC StartIncludes := UsingIncludes}
  31. {$SETC UsingIncludes := 1}
  32.  
  33.  
  34. {$IFC UNDEFINED __TYPES__}
  35. {$I Types.p}
  36. {$ENDC}
  37. {    ConditionalMacros.p                                            }
  38.  
  39. {$PUSH}
  40. {$ALIGN MAC68K}
  41. {$LibExport+}
  42.  
  43. TYPE
  44.     DefStartRec = RECORD
  45.         CASE INTEGER OF
  46.         0: (
  47.             sdExtDevID:                    SignedByte;
  48.             sdPartition:                SignedByte;
  49.             sdSlotNum:                    SignedByte;
  50.             sdSRsrcID:                    SignedByte;
  51.            );
  52.         1: (
  53.             sdReserved1:                SignedByte;
  54.             sdReserved2:                SignedByte;
  55.             sdRefNum:                    INTEGER;
  56.            );
  57.     END;
  58.  
  59.     DefStartPtr = ^DefStartRec;
  60.  
  61.     DefVideoRec = RECORD
  62.         sdSlot:                    SignedByte;
  63.         sdsResource:            SignedByte;
  64.     END;
  65.     DefVideoPtr = ^DefVideoRec;
  66.  
  67.     DefOSRec = RECORD
  68.         sdReserved:                SignedByte;
  69.         sdOSType:                SignedByte;
  70.     END;
  71.     DefOSPtr = ^DefOSRec;
  72.  
  73.  
  74. PROCEDURE GetDefaultStartup(paramBlock: DefStartPtr);
  75.     {$IFC NOT GENERATINGCFM}
  76.     INLINE $205F, $A07D;
  77.     {$ENDC}
  78. PROCEDURE SetDefaultStartup(paramBlock: DefStartPtr);
  79.     {$IFC NOT GENERATINGCFM}
  80.     INLINE $205F, $A07E;
  81.     {$ENDC}
  82. PROCEDURE GetVideoDefault(paramBlock: DefVideoPtr);
  83.     {$IFC NOT GENERATINGCFM}
  84.     INLINE $205F, $A080;
  85.     {$ENDC}
  86. PROCEDURE SetVideoDefault(paramBlock: DefVideoPtr);
  87.     {$IFC NOT GENERATINGCFM}
  88.     INLINE $205F, $A081;
  89.     {$ENDC}
  90. PROCEDURE GetOSDefault(paramBlock: DefOSPtr);
  91.     {$IFC NOT GENERATINGCFM}
  92.     INLINE $205F, $A084;
  93.     {$ENDC}
  94. PROCEDURE SetOSDefault(paramBlock: DefOSPtr);
  95.     {$IFC NOT GENERATINGCFM}
  96.     INLINE $205F, $A083;
  97.     {$ENDC}
  98. PROCEDURE SetTimeout(count: INTEGER);
  99. PROCEDURE GetTimeout(VAR count: INTEGER);
  100.  
  101. {$ALIGN RESET}
  102. {$POP}
  103.  
  104. {$SETC UsingIncludes := StartIncludes}
  105.  
  106. {$ENDC} {__START__}
  107.  
  108. {$IFC NOT UsingIncludes}
  109.  END.
  110. {$ENDC}
  111.